<text><span class="style10"></span><span class="style11">Regions Package v 1.0</span><span class="style10"></span><span class="style12">by Nigel Perry</span><span class="style10"></span><span class="style12">Auxilary files include the Region XCMD stack and the folders Picture WDEF ƒ, Picture MDEF ƒ and BitMapToRegion ƒ.</span></text>
</content>
<content>
<layer>card</layer>
<id>8</id>
<text><span class="style16"></span><span class="style13">Copyright © 1990, Nigel Perry</span><span class="style10"></span><span class="style14"></span><span class="style10">All XCMD, XFCN, WDEF & MDEF code resources are copyright. They are free for personal use and in stacks & applications which are free, provided this copyright and conditions are clearly displayed. They cannot be used for commercial or profit-making purposes, as inducements to buy other products, or included in ShareWare without prior agreement with the author.</span><span class="style15">If you appreciate this package, please send me a postcard of your home town/area.</span></text>
</content>
<name>Advert</name>
<script>on mouseUpif the optionKey is down thenrepeat with i = 1 to number of cd fldsshow cd fld iset the lockText of cd fld i to not the lockText of cd fld iend repeatend ifend mouseUpon openCardif the optionKey is down then exit openCardlock screenshow cd fld "T1"unlock screen with dissolvewait 120lock screenhide cd fld "T1"show cd fld "T2"unlock screen with dissolvewait 120lock screenhide cd fld "T2"show cd fld "T3"play Applauseunlock screen with dissolvewait 120lock screenshow cd fld "T4"unlock screen with barn door openwait 180lock screenhide cd fld T4show cd fld T5unlock screen with barn door openwait 180lock screenhide cd fld T5show cd fld Blankunlock screen with barn door closelock screenhide cd fld Blankshow cd fld T6unlock screen with barn door openwait 5 secslock screenrepeat with i = 1 to number of cd fldshide cd fld iend repeatunlock screen with dissolvevisual effect barn door closego cd 1end openCard</script>
</card>
card_2868.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpif optionKey is down thengotoStackelsevisual effect dissolvego to cd "Gray"go to stack "Regions"end ifend mouseUp</script>
</part>
<part>
<id>12</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>249</left>
<top>149</top>
<right>332</right>
<bottom>200</bottom>
</rect>
<style>opaque</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>1000</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>editScript XFCN</name>
<script>on mouseUpgotoStackend mouseUp</script>
</part>
<part>
<id>3</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>166</left>
<top>149</top>
<right>249</right>
<bottom>200</bottom>
</rect>
<style>opaque</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>1000</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Picture MDEF</name>
<script>on mouseUpgotoStackend mouseUp</script>
</part>
<part>
<id>4</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>83</left>
<top>149</top>
<right>166</right>
<bottom>200</bottom>
</rect>
<style>opaque</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>1000</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Picture WDEF</name>
<script>on mouseUpgotoStackend mouseUp</script>
</part>
<part>
<id>6</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>0</left>
<top>204</top>
<right>416</right>
<bottom>240</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>10</textSize>
<textStyle>plain</textStyle>
<textHeight>13</textHeight>
<name>Author</name>
<script></script>
</part>
<part>
<id>7</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>332</left>
<top>149</top>
<right>416</right>
<bottom>200</bottom>
</rect>
<style>opaque</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>1000</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Sticky Buttons</name>
<script>on mouseUpgotoStackend mouseUp</script>
</part>
<part>
<id>9</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>1</left>
<top>40</top>
<right>416</right>
<bottom>148</bottom>
</rect>
<style>opaque</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font></font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name></name>
<script></script>
</part>
<part>
<id>10</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>0</left>
<top>34</top>
<right>416</right>
<bottom>200</bottom>
</rect>
<style>opaque</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font></font>
<textSize>14</textSize>
<textStyle>plain</textStyle>
<textHeight>18</textHeight>
<name>Copyright</name>
<script></script>
</part>
<content>
<layer>background</layer>
<id>2</id>
<text>Region Package</text>
</content>
<content>
<layer>background</layer>
<id>3</id>
<text>Stack & Code Resources © 1990, Nigel PerryCode resources written in THINK C © Symantec</text>
</content>
<content>
<layer>card</layer>
<id>6</id>
<text>Nigel Perry, Dept of Computing, Imperial College, 180 Queens Gate, London SW7, UKEmail: np@doc.ic.ac.ukThanks to ßeta Testers: Ruben Leon, Mark Sanderson, Olle Furburg & Duncan Langford.</text>
</content>
<content>
<layer>card</layer>
<id>9</id>
<text><span class="style8">egions</span><span class="style9"> are arbitrary shaped windows which may be used as HyperCard ΓÇ£buttonsΓÇ¥, the stack ΓÇ£RegionsΓÇ¥ describes them in detail. The stacks ΓÇ£Picture WDEFΓÇ¥, ΓÇ£Picture MDEFΓÇ¥ and ΓÇ£editScript XFCNΓÇ¥ detail other code resources in the package. The ΓÇ£Sticky ButtonsΓÇ¥ stack is a paper on a method for adding sticky buttons to HyperCard. Click on one of the buttons below to go to that stack, option-click to open the stack in a new window.</span></text>
</content>
<content>
<layer>card</layer>
<id>10</id>
<text>Free for personal use and for use in stacks & applications which are free, provided the copyright notice and these conditions are clearly displayed. May not be used for commercial or profit-making purposes, as an inducement to buy another product, or in ShareWare without agreement with the author.If you like this product why not send me a postcard of your home town or region, just to thank and encourage me?</text>
</content>
<name>Intro</name>
<script>on openStackglobal doneRegionCopyRightif doneRegionCopyRight is not "dunnit"thenset the cantAbort of this stack to trueset cursor to watchif random(3) is 3 thenvisual effect barn door opengo cd Advertelselock screenshow cd fld "Copyright"unlock screen with barn door openwait 10 secslock screenhide cd fld "Copyright"unlock screen with barn door closeend ifput "dunnit" into doneRegionCopyRightset the cantAbort of this stack to falseend ifend openStackon gotoStackvisual effect dissolve to grayvisual effect dissolveif the optionKey is downthengo to stack the short name of the target in new windowelsego to stack the short name of the targetend ifend gotoStackon mouseUpglobal doneRegionCopyRightif the optionKey is down thenput empty into doneRegionCopyRightsend openStack to this cdend ifend mouseUp</script>
